YES 0.51
↳ HASKELL
↳ BR
| (((>=) :: Ordering -> Ordering -> Bool) :: Ordering -> Ordering -> Bool) | 
| import qualified Prelude | 
↳ HASKELL
↳ BR
↳ HASKELL
↳ COR
| (((>=) :: Ordering -> Ordering -> Bool) :: Ordering -> Ordering -> Bool) | 
| import qualified Prelude | 
compare x y 
| x == y 
= EQ | x <= y 
= LT | otherwise 
= GT 
compare x y = compare3 x y 
compare0 x y True = GT 
compare1 x y True = LT compare1 x y False = compare0 x y otherwise 
compare2 x y True = EQ compare2 x y False = compare1 x y (x <= y) 
compare3 x y = compare2 x y (x == y) 
undefined 
| False 
= undefined 
undefined = undefined1 
undefined0 True = undefined 
undefined1 = undefined0 False 
↳ HASKELL
↳ BR
↳ HASKELL
↳ COR
↳ HASKELL
↳ Narrow
| ((>=) :: Ordering -> Ordering -> Bool) | 
| import qualified Prelude |